﻿Imports DNP.GestionComercial.BE
Imports DNP.GestionComercial.DAL

Public Class UbigeoBL
    Public Function ObtenerDepartamentos() As RespuestaBE
        Dim odlUbigeo As New UbigeoDAL
        Return odlUbigeo.ObtenerDepartamentos()
    End Function

    Public Function ObtenerProvincia(ByVal pDepartamento As String) As RespuestaBE
        Dim odlUbigeo As New UbigeoDAL
        Return odlUbigeo.ObtenerProvincia(pDepartamento)
    End Function

    Public Function ObtenerDistrito(ByVal pDepartamento As String, ByVal pProvincia As String) As RespuestaBE
        Dim odlUbigeo As New UbigeoDAL
        Return odlUbigeo.ObtenerDistrito(pDepartamento, pProvincia)
    End Function
End Class
